Namespace BAL.Servicio
    Public Class Encuesta
        Public Function Listar() As DataTable
            Dim _dal As New DAL.Servicio.Encuesta
            Return _dal.Listar()
        End Function
        Public Function ListarEstructura(ByVal intId As Integer) As DataTable
            Dim _dal As New DAL.Servicio.Encuesta
            Return _dal.ListarEstructura(intId)
        End Function
    End Class
End Namespace